home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / BUSITION / ARCHTEC1.LZH / GO.BAT < prev    next >
DOS Batch File  |  1991-12-25  |  4KB  |  162 lines

  1. Echo off
  2. IF NOT EXIST INPUT.COM GOTO WRONGDR
  3. cls
  4. echo  
  5. ECHO  Welcome to the installation procedure for Architect's Helper [TM]!
  6. ECHO                           [disk one of two]
  7. echo  
  8. ECOH ══════════ Software so powerful it redefines your expectations ══════════
  9. echo  
  10. ECHO                              by Paul Sax
  11. echo  
  12. ECHO Relax and enjoy yourself.  Though this program is powerful,
  13. ECHO nothing could be easier than this installation procedure.
  14. echo  
  15. ECHO Would you like to install this program on a Hard Drive?
  16. echo  
  17. :YESNO
  18. YESNO
  19. CLS
  20. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES
  21. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO YES1
  22. GOTO YESNO
  23. :YESNEXT
  24. CLS
  25. ECOH For you to install this program on a hard drive, this disk must be on Drive A.
  26. echo  
  27. ECHO Is this floppy on drive A now?
  28. echo  
  29. YESNO
  30. CLS
  31. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES 
  32. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO NO1
  33. GOTO YESNEXT
  34. :YES1
  35. CLS
  36. ECHO Would you like to install this program on a floppy-based system?
  37. echo  
  38. YESNO
  39. CLS
  40. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES2
  41. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO END
  42. GOTO YES1
  43. :YES
  44. CLS
  45. echo  
  46. ECOH ══════════ Select the Hard drive you want to install the program on: ══════════
  47. echo  
  48. echo  
  49. echo           C = Drive C           D = Drive D
  50. echo           E = Drive E           F = Drive F
  51. echo           G = Drive G
  52. :INPUT
  53. echo  
  54. echo  
  55.              INPUT            (Pick a letter.)
  56. IF ERRORLEVEL 72 GOTO INPUT
  57. IF ERRORLEVEL 71 GOTO G
  58. IF ERRORLEVEL 70 GOTO F     
  59. IF ERRORLEVEL 69 GOTO E     
  60. IF ERRORLEVEL 68 GOTO D     
  61. IF ERRORLEVEL 67 GOTO C     
  62. IF ERRORLEVEL 67 GOTO C
  63. REM IF ERRORLEVEL 66 GOTO B
  64. REM IF ERRORLEVEL 65 GOTO A
  65. GOTO INPUT
  66. :C
  67. CLS
  68. echo  
  69. DDR
  70. if ERRORLEVEL 4 INSTALL H C E:
  71. if ERRORLEVEL 3 INSTALL H C D:
  72. if ERRORLEVEL 2 INSTALL H C C:
  73. if ERRORLEVEL 1 INSTALL H C B:
  74. if ERRORLEVEL 0 INSTALL H C A:
  75. GOTO END
  76. :D
  77. CLS
  78. echo  
  79. DDR
  80. if ERRORLEVEL 4 INSTALL H D E:
  81. if ERRORLEVEL 3 INSTALL H D D:
  82. if ERRORLEVEL 2 INSTALL H D C:
  83. if ERRORLEVEL 1 INSTALL H D B:
  84. if ERRORLEVEL 0 INSTALL H D A:
  85. GOTO END
  86. :E
  87. CLS
  88. echo  
  89. DDR
  90. if ERRORLEVEL 4 INSTALL H E E:
  91. if ERRORLEVEL 3 INSTALL H E D:
  92. if ERRORLEVEL 2 INSTALL H E C:
  93. if ERRORLEVEL 1 INSTALL H E B:
  94. if ERRORLEVEL 0 INSTALL H E A:
  95. GOTO END
  96. :F
  97. CLS
  98. echo  
  99. DDR
  100. if ERRORLEVEL 4 INSTALL H F E:
  101. if ERRORLEVEL 3 INSTALL H F D:
  102. if ERRORLEVEL 2 INSTALL H F C:
  103. if ERRORLEVEL 1 INSTALL H F B:
  104. if ERRORLEVEL 0 INSTALL H F A:
  105. GOTO END
  106. :G
  107. CLS
  108. echo  
  109. DDR
  110. if ERRORLEVEL 4 INSTALL H G E:
  111. if ERRORLEVEL 3 INSTALL H G D:
  112. if ERRORLEVEL 2 INSTALL H G C:
  113. if ERRORLEVEL 1 INSTALL H G B:
  114. if ERRORLEVEL 0 INSTALL H G A:
  115. GOTO END
  116. :NO
  117. echo  
  118. ECHO To install this for a floppy based system, this disk must be on Drive B.
  119. GOTO END
  120. :NO1
  121. CLS
  122. GOTO END
  123. :YES2
  124. CLS
  125. echo  
  126. ECHO Beginning with version 4.0 of this program, it will not operate 
  127. ECHO on a floppy-based system.  
  128. echo  
  129. GOTO END
  130. ECHO This disk must be on drive B to manufacture those three disks. 
  131. ECHO Each disk must be 720 kb or greater.
  132. ECHO Are you in drive B now?
  133. echo  
  134. YESNO
  135. CLS
  136. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES3
  137. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO NO3
  138. GOTO YES2
  139. :YES3
  140. CLS
  141. INSTALL F 2
  142. :NO3
  143. CLS
  144. echo  
  145. echo To install this program, move this disk to drive B and re-execute 'GO' there.
  146. GOTO END
  147. :NO2
  148. CLS
  149. echo  
  150. :WRONGDR
  151. CLS
  152. echo  
  153. echo  
  154. ECHO Though nothing could be simpler than this install procedure, it does   
  155. echo require that you enter the drive name, such as 'A:' or 'B:', followed
  156. echo by the 'Enter' key.  After that, please enter 'GO' again.
  157. echo  
  158. GOTO END
  159. :END
  160. echo  
  161.  
  162.